home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Meeting Pearls 2
/
Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso
/
Pearls
/
psion
/
src.doc
/
games
/
bangko
/
bangkok.opa
/
bangkok.txt
next >
Wrap
Text File
|
1986-01-23
|
2KB
|
190 lines
OPLObjectFile**
LOC::A:\OPL\BANGKOK.OPL
Bangkok.ODB
\OPD\
DIEVAL%
SCRVAL%
SPRID%
NEWDICE%
CHOSEN%
SCORE%
INBONUS%
BONUS%
NRPL&
ISDRAWN%
PNAME$
SCORES%
GAMELMT&
S3APL%
WAITSW%
WINX%
LWINID%
RWINID%
BISDRWN%
SOUND%
HANDPOS%
GSETUP%
SHOWPL
PLAYER%
PLAYWVE
*WoodyO
+ Game Over
pays for the beerK
NRPL&
PNAME$
SCORES%
LO2PHO2
LO2PHO2
LO2PHOA
SCORES%
NRPL&
GAMELMT&
WAITSW%
SOUND%
PNAME$
S3APL%
hW.W/O
Tina's Tumblers
W.ObLO
W.ObLW/O
W.W/O
W.OaLW/O
Define Players
No. PlayersO
S3a?+
Yes,No
Sound?+
Yes,No
+ End Game:O
AbortO
Ralph
Name Players
Player
Player
AbortO
(Game ends
points)K
RNSoft
W.OdL
Ralph Nolte
W.OdL
LO2PHO2
SETUP
PROCESS%
CLEANUP
UNDRAW
CHOSEN%
INBONUS%
HANDPOS%
W.OaLW/O
W.O1L
TLW/O
DRAWDICE
CHOOSE%
UNDRAW
CKABORT%
NEWDICE%
SCORE%
S3APL%
PNAME$
BONUS%
INBONUS%
WAITSW%
SPRID%
Score:
.. K
getK
bonus with 'K
'... KO
+ No changeKO
point
points
receiveK
BONUS (
) for K
Press any keyO
Total Bonus:
Total Bonus:
BONUS (
) for K
LWINID%
RWINID%
ISDRAWN%
BISDRWN%
DRAWHAND
PLAYS3A%
MOVEHAND
CKABORT%
UNDRAW
DRAWDICE
HANDPOS%
INBONUS%
DIEVAL%
BONUS%
SPRID%
SCRVAL%
CHOSEN%
S3APL%
NEWDICE%
O @[z
+/ Choose at least 1 die with <- -> and 'Enter'! O
DIEVAL%
CHOSEN%
MOVEHAND
SPRID%
Bangkok.pic
LO2PHOF
DRAWHAND
SPRID%
LO2PHOF
PLAYWVE
DRAWHAND
DRAWDIE%
DISCORE
NEWDICE%
SPRID%
SOUND%
HANDPOS%
INBONUS%
BISDRWN%
BONUS%
DIEVAL%
SCORE%
ISDRAWN%
SCRVAL%
Rolling dice...O
*dieO
*diceO
LO2PHO
HO-PL
LO-PO
LWINID%
RWINID%
NEWDICE%
O(O(O
W.OdL0
|RWBIx
SOUND%
Abort Game
Terminate Game?O
NO!!O
SoundOSh
Os@`[
SHOWPL}
GSETUP%>
PLAYER%
SETUP
CLEANUPP
DISCOREc
PROCESS%
UNDRAW
CHOOSE%h
PLAYS3A%=
DRAWHAND
MOVEHAND
DRAWDICE
DRAWDIE%v
PLAYWVE
CKABORT%